home *** CD-ROM | disk | FTP | other *** search
/ Kyoko 8203 / Kyoko 8203.iso / pc / photo.dxr / 00018_èâä²âª.ls < prev    next >
Encoding:
Text File  |  2003-03-03  |  247 b   |  14 lines

  1. global page
  2.  
  3. on prepareFrame
  4.   global cdvoume
  5.   page = 1
  6.   set the volume of sound 1 to cdvoume * 19
  7.   repeat with i = 15 to 27
  8.     sprite(i).visible = 1
  9.   end repeat
  10.   repeat with i = 15 + cdvoume to 27
  11.     sprite(i).visible = 0
  12.   end repeat
  13. end
  14.